H 


IDENTIfICATION 


PRODUCT code | 
PRODUCT NAME) 
DATE CREATED I 

maintained 

AUTHOR| 


MAINDCC-8C«D0E3*D 
RANDOM TAD r ES“ 
JUNE T.197; 
DIAGNOSTIC S»3JP 
MICHAEL DAVIS 










/ 







APS r RACT 



2 , 


Tnib program tests the tad instructing or the pop«se, the 
tad' instruction, instruction ADDRESS, OPERAND AOORCSS and 
both OPERANDS ARE PRODUCED BY RANOOH NUMBER GENERATORS, 

REQUIREMENTS 


2,1 EQUIPMENT 


PDP-8E EOUIPPEO WITH AT LEAST 4K OP MEMORY V 

TELETYPE, 

2,2 STORAGE 


THE PROGRAM IS LOADED INTO LOCATIONS *410 IHRU 7077, 

THE TEST AREA IS 1010-4977, TEMPORARY STORAQE LOCATIONS 

ARE LOCATED ON PAGE 0, 

2.3 PRELIMINARY PROGRAMS 

MAINQEC-BE-DBAA, oiba, OICA, DIDA 

3, LOADING PROCEDURE 

THE STANOARD PROCEDURE POP LOAOING BINARY TAPE* IS TO 9E USED, 

4, STARTING PROCEDURE 


4,1 STARTING adoress 


0200 

4.2 CONTROL SWITCH SETTINOS 


SR00*1, SUPPRESS HALT ON ERROR 
SR03-1, SUPPRESS ENO OP PASS TYPEOUT 
SR0V.1, hOLO DATA i CONSTANT 
SR10-1, HOLO OATA I CONSTANT 
SR11»1, HOLO INSTRUCTION CONSTANT 



4,3 OPERATOR ACTION 


4,3,1 SET SR TO 0200 


4,3,2 PRESS LOAD ADORES? SWITCH 


4,3.3 SET SR TO 0000 


4.3.4 PRESS CLEAR ANO CONTINUE SNITCHES 
9, OPERATING procedure 

SAME AS 4, 

6. ERRORS 


6,1 error halt 


IP THE RESULTS OP the TAO INSTRUCTION ARE IN00RRKCT, 


THAT 

AND 

WILL 


I II If THE ACTUAL AND iinulatio imi, w 
IINULATCO lUMt 90 NOt AlRfi, TNI HIWM 
L HALT AT 741? WITH 0ATA1 IN TNE Al, 


TNI ACTUAL 


DEPRESI CONTINUE 
DEPRESI CONTINUE 
OEPNESI CONTINUE 
DEPRESI CONTINUE 
QEPPEII CONTINUE 
TAO) IN AC. 

OEPNCSI continue 


TO OIIPLAT DATA! 
TO OIIPLAT 
TO OIIPLAT 
to OIIPLAT 
to OIIPLAT 

TO PEIUNE Tilt 


in the ai, 


INIT»U|?|0N illPtll fl 

data! adopeii In ac, 
indirect rointIr iuiii 


AI, 

IT INIIRIIf 


6.2 ERROR RECOVERY 


SEE 6. X 





















6,3 LOOPJNG 

SET mini TO PREVENT HALT 4PTER ERROR, 

SET SR|3«1 TO SUPPRESS END OP PAIS TVPEOUTl 

SET SR|*.S>ltit TO MOLO INSTRUCTION ANO OAXA CONSTANT, 

7, RESTRICTIONS 

NONE 

S. EXECUTION TINE 

THE PROGRAM PERPORNS 4|*« RANDOM TESTS IN APPROXIMATELY S 

seconds, the Program hill type «T" APtER 

EACH 4|ft RANOOM TESTS UNLESS IRISU, 

9, PROGRAM DESCRIPTION 


THE PROfRAM IS LOADED INTO LOCATIONS ASSIpPSTT, 

MITM temporary storage locations on pass si 


the PROSRAM OSES 


SEPARATE random NUMICR deaerators TO oenerate 
ON, lNSfROOTIDN ANO OAtA ADDRESSES, ANO THE 


THE TAO INSTRUCTION, INSfRUOTION ANO OAtA _ .... .... 

TNO ARSUMCNTI to SC pfiORIO*. THE INITRUCflONl ANO DATA ARE 


! Ml i* f*!«**fio adore* 

RANIPCSS to TNE LSCaTISN IP TNE iNITRUCtli 

HE pro;ram tmin tramIPers T* a comparison l. 

' ■■ ■ - 

« !{ IlNlkAt to tMK ONI Ml 
•I Alt UW9 !N TMI MOtil" 


ActyAi Iiiuut er A 

TAO. TNI IlNULltl 
•E-WCA-O, NO Tam 


•II, TH| MOOIAM 
IN ANO CXCOUTII IT, 

noutini mhih the 

COMAlfD TO A IJMUlAtlO 
0 IN NAINOIO* 
tlllsf, 


AFTM 4lt| Tlltl* TNI MOHAN fTA|l • ANO CONTJNUII TKITINI. 


PAL10 VUl 


l?«jgN-Tl 


7 1 as 


PACE 1 



0000 

• 0 

0000 

0000 

ACTUANi 

0001 

1001 

INITLs 

0002 

0002 

INAOOL* 

0003 

0003 

oataol# 

0004 

0000 

aaodl. 

0005 

0000 

IFLACL, 


7501 



7421 



A007 



0200 

•200 

0200 

*007 

0TAAT. 

0201 

9602 


0202 

*600 



AAL10 

V141 


/lANOON TAO TEIT 

/COPYNlOMT^ltrf, OIOITAL EQUIPMENT COM., MAVNAAO, MASS. 01754 

/ 

/ 

/T!mPOA*AY stoaace locations 
/ 

• 

JMP 

t 

s 

• 

1 

M|A*73f1 
MOL.7421 
CAF.*|07 


.♦i 


CAF 
JMP I 

staatl 


17.JUN-71 


7123 


AAGE 2 


/OENCA ATE TEST 
/ 


INITAUCTION ANO data 



*600 

•6600 


6600 

7300 

•TAATLs cla 

CLL 

6601 

3376 

OCA 

cntai 

6602 

7604 

TESTILi lai 


6603 

0371 

ANO 

• All 

6604 

7640 

IIA 

CLA 

6605 

0224 

JMA 

TOATIL 

6606 

4746 

JMI 

I tcinl 

6607 

3355 

OCA 

tiflol 

6610 

7040 

CMA 


6611 

0001 

AND 

INSTL 

6612 

3393 

OCA 

TINSTL 

6613 

7040 

CMA 


6614 

0002 

ANO 

INAOOL 

6615 

3354 

OCA 

TINAOL 

6616 

7040 

CMA 


6617 

0013 

ANO 

OATAOL 

6620 

3356 

OCA 

TDATAL 

6621 

7040 

CMA 


6622 

0004 

ANO 

aaool 

6623 

3357 

OCA 

tpadol 

6624 

7604 

toatil, las 


6625 

0372 

ANO 

S A10 


/CLIAA AAtf COUNT!A 

/TIIT IA11 
/II IAll«l 

/IliMlo 00 NOT GINIAATI INITAUCTION 
/IfNClAtf INITAUCTION 
/•AVI 1N0INCCT f L A 

/lit INITAUCTION 
/•AVI IT 

/CIT INITAUCTION AODAISS 
/•AVI IT 

/6IT DATA AOOAISS 
/•AVI IT 

/CIT INOIAICT TO DATA 
/SAVE IT 

/TEST SA1I 







6 6 ? 6 

7640 


S2A 

CLA 


662 7 

9234 


JMR 


T0AT2L 

6630 

7040 


CMA 



6631 

0360 


ANO 


T0A1L 

6632 

4752 


JMS 

I 

trandl 

6633 

3360 


OCA 


tdail 

6634 

7604 

T0AT2L. 

LAS 



6639 

0373 


ANO 


SR09 

6636 

7640 


SI A 

CLA 


6637 

9244 


JMR 


9ETTL 

6640 

7040 


CMA 



6641 

0361 


ANO 


T0A2L 

6642 

4752 


JMI 

I 

TRANDL 

6643 

3361 


OCA 


T0A2L 


RAL10 

V141 

17.JUN-71 


/IS SR1M1 

/SRl0«l, 00 NOT GENERATE 0ATA1 
/GENERATE RANDOM NUMBER 


/TEST SRB9 
/IS SRI9*1 

/SR09-1, 00 NOT GENERATE DATA2 

/generate random number 


ties rage s 


/ 

/SET UR INSTRUCTION ANO OATa AT TEST ADDRESS 
/ALONG WITH RETURN TO THIS ROUTINE 


/ 


6644 

7340 

iettl, 

CLA 

CLL 

CMA 


6649 

0393 


ANO 


TINSTL 

/GET INSTRUCTION 

4646 

3754 


OCA 

I 

TINAOL 

/STORE IN TEST LOCATION 

4647 

7040 


CMA 




6690 

0395 


ANO 


tirlbl 

/GET INOIRECT FLAG 

6651 

7690 


SNA 

CLA 


/IS INSTRUCTION INOIRECT 

6692 

9302 


JMR 


OIRL 

/NO. GET OATA 

6653 

7040 


CMA 




6654 

0396 


ANO 


TOATAL 

/AOORESS IS INDIRECT 

6695 

0347 


ANO 


T7740 

/IS AOORESS AUTO-INOEX REGISTER 

6656 

7640 


BlA 

CLA 


6697 

0276 


JMR 


notaut 

/NO 

6660 

7040 


CMA 




6641 

1396 


ANB 


TOATAL 


6642 

9375 


ANO 


RIB 


6643 

7690 


SNA 

OLA 



4644 

0276 


JMR 


NOTAUT 


6645 

7040 


OMA 




6666 

0397 


ANO 


TfADBL 

/AOORESS IS AUTO-INDEX REGISTER 

4647 

7041 


eu 



/DECREMENT ROINTER TO OATA 

4670 

7040 


ORA 




6671 

9790 


OCA 

I 

TOATAL 

/STONE IN TEST LOCATION 

4672 

7940 


ORA 



4673 

0340 


ANO 


toail 

TRAOOL 

/BET OATA 

4674 

1797 


OCA 

I 

/STORE IN TEST LOCATION 

6675 

9309 


JMR 


botstl 

6676 

7040 

notaut* 

CMA 




6677 

0397 


ANO 


TRAOOL 


6700 

1796 


OCA 

I 

TOATAL 


6701 

9272 


JMR 


.-7 


4702 

7040 

URL. 

OMA 




4703 

0360 


ANO 


tdail 

/SIT OATA 

6704 

3796 


OCA 

I 

TOAtAL 

/STORE IN TEST LOCATION 




/•IMULATE •TAO" 



4705 

7340 

OOTSTl. 

CLA 

CLL CMA 


6706 

0340 


ANO 

TOAIL 

/GET OATAI 

4707 

74S1 


M0L 


/SAFE IN MQ 

4710 

7940 


IMA 



4711 

0361 


ANO 

TOA0L 

/GET OATAI 

4712 

4791 


JMS 

I TSIMAO 

/DO SIMULATION 

4713 

1343 


CIA 

TBtNAC 

/SAVE ANBNER 

6714 

7010 


RAR 



6715 

3362 


OCA 

TSIML 

/SAVE LINK 


RAL10 

vin 

17.JUM-71 7 ill 

RASE 4 


4716 7040 

4717 0347 

4720 1010 

4721 7040 

47£2 0394 

0723 7001 

4724 7490 

6729 9202 

6726 3349 

6727 7040 

6730 0346 

6731 1745 

4732 7140 

6733 0361 

6734 9794 


6739 1344 

6736 7010 

6737 3365 

6740 4774 

6741 0374 

6742 9202 

4743 4750 

6744 9202 


OOANOLi 


TRETUL. 


/ 

/BO TO 
/ 

cma 

ANO 

oeA 

CMA 

ANO 

IAC 

SNA 

JMR 

OCA 

oma 
ANO 
OCA I 
OLL CMA 
ANO 
JMR I 
/ 

/RETURN 

/ 

OCA 
RAR 
OCA 
JMB I 
III 
JMR 
JMI I 
JMR 


teot 


trEttl 

RETURN 

TJNA0L 


TEITU 

TEMRlL 

T9400L 

TEMRlL 

T0A21 

TIRA0L 

NCNE artkr 

TAC 

TLINM 

TCOMAO 

CNTR1 

TEIT1L 

TERA0L 

TE9T1L 


/GET RETURN AODRESS 
/SAVE 

/GET INSTRUCTION A00RE8S 

/increment 

/1 • IT B 

/TtS. GENERATE NEW INFORMATION 
/NO. BATE 

/BIT RETURN INSTRUCTION 
/RUT IN TEST LOCATION 

/•CT OATAI 
/EiEBNTE •TAB" 

erecutibn 
/bate AC 




NR 


REAL ANO BIMULATEO AOOITIONS 


/END OR RASS. ABBA TEST COMPLETE 



RAL1B 

9141 

17-JUN< 

/ 

6745 

0000 

TEMRlL» 

/ 

/ 

0 

6746 

7000 

TGENL » 

genl 

6747 

6735 

TRETTL. 

TERROR, 

TRETUL 

6750 

7442 

lTEPASl. 

erasl 

6751 

7200 

TSIMAO, 

RSIMAO 

6752 

7430 

trandl. 

RANOL 

6753 

0000 

tinstl, 

0 

6754 

0000 

TINAOL, 

0 

6755 

0000 

titlgl. 

0 

6756 

0000 

tdatal. 

0 

6757 

0000 

TRAOOL, 

0 



, J 

2 0 2 1 

* w A 1 L * 

21 

6 ’6: 

003" 

T D a 2l < 

37 

t ' b'c 

00 00 

TSI«L, 

7 

ft 7 fc 3 

rm 

TSIWAC. 

0 

ft 7 ft4 

0000 

TAC. 

0 

67(S5 

0000 

TL INK, 

0 

6 7 6 6 

5400 

T5400L, 

5400 

ft 7 6 7 

7/60 

T 7 7 60 # 

7760 

6 7 70 

7 / 70 

T7770, 

7770 

6 7 71 

00ei 

SRI 1. 

1 

6772 

0002 

SR10 > 

2 

6773 

0004 

SR09, 

4 

6774 

7313 

tcomad, 

COMAD 

6775 

0010 

K10, 

10 

6776 

0000 

CNTRl, 

0 


PAL 10 

V1A1 

17-JUN- 


7123 


RAGE 6 


/generate 

/ 


instructions and addresses 



7000 

PACE 




7000 

0000 

GENL, 

0 






/GENERATE "AND" INSTRUCTION 

7001 

7040 

oanol, 

CNA 



7002 

0350 


AND 

R1L 


7003 

4/62 


JMS I 

sranol 

/generate random numrer 

7004 

3350 


OCA 

R1L 

/SAVE NUMRER 

7005 

7040 


CMA 



7006 

0350 


AND 

R1L 


7007 

7421 


MOL 


/generate or code 

7010 

7040 


CMA 



7011 

0365 


ANO 

K1S0I 


7012 

7501 


MOA 



7013 

0352 


ANO 

M1777 


7014 

3001 


OCA 

1N8TI 

/SAVE INSTRUCTION 

7015 

7040 


CMA 



7016 

0001 


AND 

IN8TL 

/GET INSTRUCTION 

7017 

0355 


ANO 

MS177L 

/EXTRACT RAGE ADORESS OF 

7020 

3361 


OCA 

TENRIL 

/save Rage address or ins' 




/generate address FOR 

instruction 

7021 

7040 

ganadl. 

CMA 



7022 

0353 


ANO 

RtL 


7023 

4/62 


JMS I 

sranh 


7024 

3353 


OCA 

R2L 

/SAVE NUMBER 

7025 

7040 


CMA 



7026 

0353 


AND 

R2L 


7027 

4777 • 


JMS 

LIMIT 

/IS AOORESS WITHIN LIMITS 

7030 

5221 


JMR 

GANAOL 

/NO, GENERATE NEW AOORESS 

7031 

7040 


CMA 



7032 

0353 


AND 

R2L 


7033 

0354 


ANO 

Rll 


7034 

7640 


8IA CIA 


/IS AOORESS ON PAGE R 

7035 

5244 


JMR 

ragadl 

/NO 


INSTRUCTION 


7036 7040 


CMA 


7037 

0353 


ANO 

R2L 


/GET PAGE ADDRESS OF INSTRUCT 

7040 

4776* 

ragal, 

JMS 

ARIL 


/GET DIFFERENCE RETWEEN RACE 

7041 

7700 


8MA 

CLA 


/IS DIFFERENCE >2 

7042 

5221 


JMR 

OANAOL 


/NO 

7043 

5255 


JMR 

RAL 




PAL10 

V141 

17-, 

JUN-71 

7123 

RARE 7 

7044 

7040 

Ragadl, 

CMA 




7045 

0001 


ANO 

IN8TL 


/GET INSTRUCTION 

7046 

0357 


ANO 

K20RL 



7047 

7650 


SNA 

CLA 


/IS RACE RIT SET 

7050 

5295 


JMR 

RAL 


/NO, USE AOORESS AS IS 

7051 

7040 


CMA 




7052 

0353 


ANO 

R2L 


/PAGE BIT SET, EXTRACT RAGE A( 

7053 

0355 


ANO 

RR177L 



7054 

5240 


JMR 

ragal 


/TEST FOR INTERFERENCE 

7055 

7040 

ral, 

CMA 




7056 

0361 


ANO 

temrsl 


/MAKE SURE OATa WILL 

7057 

7650 


SNA 

CLA 


/NOT RE STORED IN LOCATION 0 

7060 

5201 


JMR 

6AN0L 


/LOCATION IERO, TRY AGAIN 

7061 

7040 


CMA 



/USE AOORESS AS IS 

7062 

0353 


ANO 

R2L 



7063 

3002 


OCA 

INAOOL 




PAL10 

V141 

17-JUN-71 

7123 

RAGE 6 


/GENERATE ADORESS TOR DATA 


7064 

7040 

OAAOL, 

CMA 



7065 

0001 


ANO 


inrtl 

7066 

0357 


ANO 


K2RRL 

7067 

7650 


SNA 

CLA 


7070 

5307 


JMR 


rral 

7071 

7040 


CMA 



7072 

0002 


ANO 


INAOOL 

7073 

0354 


ANO 


PRL 

7074 

7421 


MQL 



7075 

7040 


CMA 



7076 

0361. 


ANO 


TEMP3L 

7077 

7501 


MQA 



7100 

3003 


OCA 


DATaOL 

7101 

7040 

indirl, 

CMA 



7102 

0001 


ANO 


INSTl 

7103 

0356 


AND 


K400L 

7104 

7640 


S2 A 

CLA 


7105 

5313 


JMR 


RADI 

7106 

56e0 


JMP 

! 

GENL 

7107 

7040 

P0Al, 

CMA 



7110 

0361 


AND 


TEMP3L 

7111 

3003 


DCA 


oataol 

7112 

5301 


JMP 


INDIRL 


/GET INSTRUCTION 

/IS RAGE nr or instruction SET 

/NO, USE RAGE A00RE8S SITS Or INSTRUCT ion for data address 
/EXTRACT RAGE OF INSTRUCTION ADDRESS 


/"OR" TOSCTMER to sit 
/data address 


/IS INSTRUCTION INOIRECT 
/TES, INSTRUCTION 18 INOIRECT 
/EXIT 

/USE PAGE ADORESS Of INSTRUCTION 
/AS DTAT AODRESS 


/GENERATE INDIRECT ADDRESS FOR DATA 




7113 

7114 

7115 

7116 

7117 
7 1 ?0 

7121 

7122 
71 23 

7124 

7125 

7126 

7127 

7130 

7131 

7132 

7133 

7134 

7135 

7136 

7137 

7140 

7141 


7fc4£ 

zstz 

4/62 

3360 

7040 

0360 

4/77* 

5313 

7040 

0002 

4/75* 

7700 

5313 

7040 

0003 

4775* 

7700 

5313 

7040 
0360 

7041 
7040 
7650 


PADl . 


C*A 

ASO 

J"$ 

OCA 

C"A 

AMO 

J"S 

J«P 

CMA 

AMO 

JMS 

SMA 

JMP 

CMA 

AMO 

JMS 

SMA 

JMP 

CMA 

AMO 

CIA 

CMA 

SMA 


CLA 


CLA 


R3L 

sranol 

R3l 

R3L 

LIMIT 

PAOL 

INAOOL 

ABSL1 

PAOL 

oataol 

ABSll 

PAOl 

SSL 


/GENERATE RAMOOM NUMBER 


/IS AOORCSS WITHIN LIMITS 
/MO, TRY ACAIM 

/CCT INSTRUCTION AOORCSS 

/CEMEREaTE OirPERCMCE BETWEEN ADDRESSES 

/DO INSTRUCTION AND ADDRESS INTERfERE 

/res 

/NO, TEST DATA AOQRESS AS ABOVE 


/ADDRESSES 00 NOT INTERFERE 
/WILL LOCATION BE B IF DECREMENTED 


CLA 



PAL10 

V141 

17-JUN 

-71 

7142 

5313 


JMP 

PAOL 

7143 

7040 


CMA 


7144 

0360 


ANO 

R3L 

7145 

3004 


OCA 

PAOOL 

7146 

7040 


CMA 


7147 

5600 


JMP I 

/ 

genl 

7150 

0001 

R1L, 

/ 

/ 

1 


7151 

0003 

N3L, 

3 


7152 

1777 

*1777, 

1777 


7153 

0005 

R2L, 

9 


7154 

7600 

P0L, 

7*00 


7155 

0177 

K0177L, 

177 


7156 

0400 

K400L, 

400 


7157 

0200 

K200L, 

210 


7160 

0015 

R3L, 

10 


7161 

0000 

tempil, 

0 


7162 

7430 

sranol, 

RANOL 


7163 

7200 

SRIMAO, 

RSIMAO 


7164 

1201 

liml. 

1001 


7165 

1000 

*1000, 

1000 



PAL10 

V141 

lT.jUN- 

71 


7123 


PAOE « 


/YES, generate new pointer 


/EXIT 


7123 

/ 

/ 

/simulated addition 
/ 


PAOE IB 


7175 

7507 



7176 

7474 



7177 

7303 




7200 

PACE 


7200 

0000 

RSIMAO. 0 


7201 

3344 

OCA 

ARG2 

7202 

7501 

NBA 

7203 

3343 

oeA 

ARG1 


7204 

7340 

SIMAO, CLA 

CLL CMA 

7205 

0343 

ANO 

ARBI 

7206 

7421 

MOL 


7207 

7040 

e*A 


7210 

0344 

ANO 

ARBI 

7211 

7501 

MBA 


7212 

3345 

OCA 

aiorai 


/SAVE ARGUMENTS 


/ 

/ 

,r or sum 

/AND CARRY BITI 
/ 

/ 

/FORM OR OF AR61 WITH ARBI 


/LOAD AC WITH ARG1 
/PLACE IN MQ 

/LOAD AC WITH ARBI 
/FORM ARBI OR ARBI 
/BiVE ARBI OR ARBI 


£2"! !2! { £* CLUI,VI ** «itn arbi 

/BY A IOR B.(A AND NOTO)BR(N0TA AND fe) 


7213 

7501 

/ 

MBA 


7214 

7040 

CMA 


7215 

034* 

ANO 

AR02 

7216 

7421 

MOL 


7217 

7040 

CMA 


7220 

0344 

ANO 

ARBI 

7221 

7040 

CMA 


7222 

0343 

ANO 

ARCl 

7223 

7501 

MQA 


7224 

3346 

OCA 

SIMAC 

7225 

3347 

OCA 

SIMLN* 


PAL10 V141 

17-JUN- 

'71 


/BIT ARBI FROR MB 
/FORM notarbi 

/lAVC^lM^MB* 01 T * §fT A "° N0TA * 81 


7m niRISli To OCT 


7123 


:i’" cri" ,w -*• arbi ano notaroi 
/OR WITH aRBI ANO NOTAROI 
/TO BET aRBI IOR ARBI 


PAOE a 


7226 

7040 

CMA 


7227 

0343 

ANO 

ARG1 

7230 

0344 

AMO 

ARG2 

7231 

7450 

SNA 

7232 

5274 

JMP ENOSIM 

/ V 

/generate carr 

7233 

7421 

/ 

MOL 


7234 

7521 

NXTCAR, MQA MQL 


7235 

0345 

AND 

A10RA2 

7236 

/4t>e 

SNA 


/ANO ARG1 WITH ARC* 

/test for Carr res 

/IF THERE ARE NO BITS IN COMMON BETWEEN AROl ANO ARBI 

/there will be no Carries generated 


/LOAD Ac WITH ARBI 
/AND WITH ARG2 

/are there any carries 

/N0« TERMINATE SIMULATION 


/SAVE FIRST CARRICO 
/GET CARRIES FROM MR 

'An Umus” 0 " eAM, “ *' E SENER ‘ TE 



1~f> 

4 4 


- mP 


E N C A c 


/NO, end SIMULATION or CARRIES 



■* : i 4 


C . - 

OAt 



/PROPICaTE CARRIES 


i~ £ 4 : 

752 : 


M -A 

MQ t 



/GET PREVIOUS CARRIES FROM MQ , SAVE 

ne« C 4 

7 2 4 2 

75e; 


m^a 




/OM NEW carries with mrfvious carries 

7?4 3 

5234 


„-p 


nxtcar 


/CONTINUE 





'•est for carr* 

INTO 

INK 


7244 

7501 

ENCAR, 

m(JA 




/GCT CARRIES 


7245 

0345 


and 


A10RA2 


/ANO WITH A10RA2 


7246 

0350 


and 


K400f 


/TEST BIT 00 


7247 

7450 


SNA 




/IS bit m 1 


7250 

5253 


jMP 


ENCAMI 


/NO, CARRIES did not propigate into 

L I NK 

7251 

3347 


OCA 


SINLNK 


/yes, Save carry into link 


7252 

5260 


JMR 


xoRall 


/complete simulation 


7253 

7130 

ENCAR1. 

CLL 

CHL 

MAM 


/SET AC-4100 


7254 

0343 


ANO 


AMC1 


/ANO WITH ARC 1 


7255 

0344 


AND 


AMG2 


/AND WITH ARG2 TO SEE IF ORIGINAL 


7256 

7440 


SZA 




/NUMBERS GENERATED CARRY INTO LINK 


7257 

3347 


OCA 


SIMLNK 


/SAVE SIMULATED LINK 
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/ 

/fORM XOR OF ARC1» 

ARC2, AND CARRIES 




/TO GET FINAL SIMULATCO SUM 

7260 

7501 

xorall* 

MQA 

/SAVE SIMULATCO CARRIES 

7261 

3351 


OCA CARRY 


7262 

7501 


MQA 


7263 

7040 


CNA 


7264 

0346 


ANO SIMAC 

/FORM A10RA2 ANO NOTGARRY 

7265 

7421 


MOL 

/SAVE IN MQ 

7266 

7040 


CNA 


7267 

• 346 


ANO SIMAC 


7270 

7040 


CNA 


7271 

0351 


ANO CAMY 

/FORM CARRY ANO MOTAlORAt 

7272 

7501 


MQA 

/OR MITh CONTENTS OF MQ 

7273 

3346 


OCA SIMAC 


7274 

7340 

ENOS IM» 

CLA CLL eMA 


7275 

0347 


AMO SIMLNK 


7276 

7640 


SlA CLA 


7277 

7020 


CML 


7300 

7040 


CMA 


7301 

0346 


ANO SIMAC 


7302 

5600 


JMP 1 RSIMAO 

/ 

/TO get final simulated SUM 


/Tf|T AOOftCSt 

/ 


7303 

0000 

LIMIT, 

• 



7304 

7421 


MOL 


/SAVE ARSUMENT IN MQ 

7305 

7040 


ewA 



7306 

0777* 


ANO 

LINL 

/LOAD AC WITH LIMIT 

7307 

4200 


JMS 

RSIMAO 

/OO ADO ITION 

7310 

7620 


8NL CLA 


/LINK SET IF NUMIKR TO LARGE 

7311 

2303 


ISI 

LIMIT 

/NUMSCR OK 

7312 

5703 


JMR I 

LIMIT 



PAL 10 

VIA! 

IT"JUN* 

71 712J 

RAOE 13 





/ 

/COMPARE SIMULATED ANO 

REAL RESULT 


7313 

0000 

COMAD, 

0 



7314 

7340 


CLA CLL CMA 



7315 

0776’ 


ANO TSIML 

/GET SIMULATED RESULTANT LINK 

7316 

7640 


SlA CLA 



7317 

7020 


CML 



7320 

7040 


CMA 



7321 

0775* 


ANO TLINK 

/COMRARC TO REAL LINK 


7322 

7640 


SlA CLA 



7323 

7020 


CML 



7324 

7430 


SIL 

/IF SAME. LINK-0 


7325 

534i 


JMR CRRORl 

/NOT THE SAME. ERROR 


7326 

7340 


CLA CLL CMA 



7327 

0774 ’ 


AND TAG 

/OCT ADDITION RESULT 


7330 

7040 


CMA 



7331 

0773 ’ 


ANO TIIMAC 

/COMRARC TO COnRLCMCNT 

OF SIMULATION RESULT 

7332 

7440 


SlA 



7333 

5341 


JMR CRRORl 

/MOT 0 . ERROR 


7334 

7040 


CMA 



7335 

0773* 


ANO TIIMAC 

/ItT SIMULATION RESULT 


7336 

7040 


CMA 



7337 

0774 * 


ANO TAC 

/COMRARC TO COmRlCNCNT 

OF REAL ADDITION 

7340 

7640 


SlA CLA 



7341 

4752 

ERROR1. 

JMS I ERRORS 



7342 

5713 


JMR I COMAO 



7343 

0000 

ARGl, 

• 



7344 

0000 

ARG2, 

• 



7345 

0000 

A10RA2, 

1 



7346 

0000 

SIMAC, 

• 



7347 

0000 

SIMLNK, 

• 



7350 

4000 

K 4000, 

4010 



7351 

0000 

CARRY, 

0 



7352 

7400 

ERRORS. 

ERROR 
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/ 

/error handler 


7373 

6/63 





7374 

6764 





7375 

6/65 





7376 

6/62 





7377 

7164 






7400 

RACE 




7400 

0000 

ERROR. 

0 



7401 

76e4 


LAS 



7402 

0267 


ANO 

SR00 

/TEST SR00 

7403 

7640 


S2 A 

CLA 

/IS SRS0-1 

7404 

5600 


JMP 

I ERROR 

/YES, DO NOT HALT 

7405 

7240 


CLA 

CMA 






74 Yb 

e 17 / • 


AND 


TDA1L 


/HALT 

WITH 

7 41/1/ 

7 42 


MLT 






741? 

7242 


CIA 

CM A 





74 11 

0/76' 


AND 


T0A2L 


/halt 

WITH 

7412 

7 4 0 2 


MIT 






741 3 

7240 


CLA 

CMA 





7414 

0/75 ' 


AND 


tinstl 


/halt 

WITH 

7 4 lt> 

7 40 2 


MLT 






7416 

7240 


CLA 

CNA 





7417 

0/74 ' 


AND 


tinaol 


/halt 

WITH 

7420 

7402 


MLT 






7421 

7240 


CLA 

CMA 





7422 

0/73' 


AND 


TOATAL 


/HALT 

WITH 

7423 

7402 


MLT 






7424 

7240 


CLA 

CMA 





7425 

0/72’ 


AND 


TPADOL 


/HALT 

WITH 

7426 

7402 


hlt 






7427 

9600 


JNP 

I 

error 







/RANDOM 

NUMBER 

generator 


7430 

0000 

RANDL’ 

f 

0 






7431 

7104 


CLL 

RAL 





7432 

7420 


SNL 






7433 

9240 


JNP 


CNiAN 




7434 

7421 


mol 






7435 

7040 


CNA 






7436 

0241 


ANO 


K3 




7437 

4771* 


JNI 


RtlNAD 




7440 

9630 

enRan, 

JNP 

I 

RANDL 




7441 

00e3 

K3> 

3 
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/ENO or 

PAIS 

7442 

0000 

epail. 0 


7443 

7604 

LAB 


7444 

0270 

ANO 

SMS 

7445 

7640 

BlA CLA 


7446 

9642 

JNP I 

EPASL 

7447 

7040 

CMA 


7450 

0271 

ANO 

CI15 

7451 

4261 

JNI 

TYPE 

7452 

7040 

CNA 


7453 

0272 

ANO 

C212 

7494 

4261 

JNI 

TYPE 

7455 

7040 

CNA 


7456 

0273 

ANO 

C324 

7457 

4261 

JNI 

TYPE 

7460 

5642 

JNP I 
/ 

EPASL 

7461 

0000 

/ 

TYPE, f 


7462 

6046 

TLB 


7463 

6041 

TIF 



7464 

5263 


7465 

7200 


7466 

5661 


7467 

4000 

SR00 

7470 

0400 

SR03 

7471 

0215 

C215 

7472 

0212 

C212 

7473 

0324 

C324 

7474 

0000 

ABSl i 

7475 

7041 

7476 

7421 


7477 

7040 


7500 

0770* 


7501 

4771 » 


7502 

7500 


7503 

7041 


7504 

7001 


7505 

7001 


7506 

56/4 



PAL10 

V141 


JNP .-1 

CLA 

JNP I TYPE 

/ 

/ 

/ 

AMI 

1410 

219 

U2 

124 

/ 

/tut rpp proper diffcbince 
/ 

0 

CIA 

MQL 

CMA 

AND TENPIL 

JMl RSI MAD 

SNA 

CIA 

IA6 

I AC 

JNP I ABBl 


17-JUN-Tl 


7121 


MIC U 


7507 

0000 

absli, 

1 

7510 

7041 


CIA 

7511 

7421 


MQL 

7512 

7040 


CMA 

7513 

0/67' 


ANO 

7514 

4771 * 


JNS 

7515 

7500 


SNA 

7516 

7041 


CIA 

7517 

7001 


I AC 

7520 

7001 


I AC 

7521 

5707 


JNP 




S 

7567 

7160 



7570 

7161 



7571 

7200 



7572 

6757 



7573 

6756 



7574 

6754 



7575 

6753 



7576 

6/61 



7 57 7 

6/60 




PAL10 

V141 

IT-j 


R3L 

RS I MAD 


ABSL1 


7:23 


PACE 14-1 



0000 

11111100 

00000000 

00000000 

00000000 

00000000 

00000000 

00000000 

00000000 

% 

0100 

00000000 

00000000 

00000000 

00000000 

00000000 

00000000 

00000000 

00000000 


0200 

11100000 

00000000 

00000000 

00000000 

00000000 

00000000 

00000000 

00000000 


0300 

00000000 

00000000 

00000000 

00000000 

00000000 

00000000 

00000000 

00000000 

0 


0400 

0500 


0600 

0700 


1000 

1100 

1200 

1300 

1400 

1500 

1600 

1700 



2000 

2100 

2200 

2300 

2400 

2500 

2600 

2700 


3000 

3100 

3200 

3300 

3400 

3500 

3600 

3700 
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4000 

4100 

4200 

4300 



4400 

4500 

4600 

4700 


5000 

5100 

5200 

5300 

5400 

5500 

5600 

5700 


6000 

6100 

6200 

6300 

6400 

6500 


6600 

6700 

11111111 

11111111 

11111111 

11111111 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

11111110 

7000 

7100 

11111111 

11111111 

11111111 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

11111100 

llllllll 

00000111 

7200 

7300 

11111111 

11111111 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

llllllll 

11100001 

llllllll 

00000000 

llllllll 

00011111 

7400 

7500 

11111111 

11111111 

llllllll 

llllllll 

llllllll 

11000000 

llllllll 

01000000 

llllllll 

00000000 

llllllll 

00000001 

llllllll 

00000001 

llllllll 

llllllll 

7600 

7700 

/ 
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A10RA2 

7345 

ABSl 

7474 

absli 

7527 

ARGl 

7343 

ARG2 

7344 

C212 

7472 

C215 

7471 

C324 

7473 

CAF 

60e7 

CARRY 

7351 

CNTRl 

6/76 

comad 

7313 

daaol 

7064 


PAGAL 

PAL 

Rll 

R2L 

R3L 

RANDl 

RETURN 

RSIHAO 

settl 

SIMaC 

SIMaD 

SIHLNK 

SR00 


7140 

7055 

7150 

7153 

7140 

7430 

0000 

7200 

6644 

7346 
7204 

7347 
7467 



0 


% 


DATADL 

3 

SR03 

7470 

dirl 

0/02 

SR09 

677j 

doandl 

4^16 

SR10 

6772 

DOTSTL 

4705 

SRll 

6771 

LNCAR 

7244 

SRANOL 

7162 

ENCAR1 

7253 

SRIMAO 

7143 

ENOSIM 

7274 

start 

0200 

ENRAN 

7440 

STaRTL 

4600 

epasl 

7442 

T540IL 

4766 

error 

7400 

T7740 

4767 

ERROR1 

7341 

T7770 

4770 

ERRORS 

7352 

TAC 

6744 

CANAOL 

7021 

TCOMAO 

4774 

GANOL 

7001 

TOA1L 

4760 

GENL 

7000 

T0A2L 

0741 

IFIAGL 

0005 

TOAT1L 

4414 

INAODL 

0002 

T0AT2L 

6634 

INOIRL 

7101 

TOATAL 

6756 

instl 

0001 

TCMP2L 

4745 

K0177L 

7155 

TEMPJL 

7141 

Kli 

4775 

tepasl 

4750 

K100I 

7145 

TERROR 

4750 

K1777 

7152 

TEIT1L 

6402 

K200L 

7157 

TCENL 

4746 

K3 

7441 

tiflcl 

0755 

K3L 

7151 

TINAOL 

4754 

K4|0| 

7350 

tinstl 

6753 

K400U 

7156 

TLINK 

6745 

LIMIT 

7303 

tpaool 

6757 

L I ML 

7104 

trandl 

6752 

MQA 

7501 

TRITTL 

6747 

MQL 

7421 

TRITUL 

6715 

notaut 

6474 

TS1MAC 

4763 

nxtcaR 

7234 

TSIMAO 

4751 

RIAL 

7ll7 

tiiml 

4762 

P0L 

7154 

T7PC 

7441 

PADOL 

0004 

MORaLL 

7240 

PAOL 

7113 



PAGAOL 

7044 
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RUN-TIHEt I SECONDS 
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